{
  Simply place this one line of code in the OnCreate event of
  the form that is showing the annoying SQL Wait cursor...
}

procedure TForm1.FormCreate(Sender: TObject);
begin
  Screen.Cursors[crSQLWait] := Screen.Cursors[crHourGlass];
end; 